home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 11 / CU Amiga Magazine's Super CD-ROM 11 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-06].iso / cucd / online / phonebill / extras / calllog.rexx next >
OS/2 REXX Batch file  |  1995-11-11  |  482b  |  16 lines
  1. /*
  2.  * calllog.rexx
  3.  *
  4.  * writes call-log compatible output to stdout
  5.  *
  6.  * Copyright (C) 1995 Raymond Penners
  7.  * All rights reserved.
  8.  */
  9.  
  10. say 'host (0123456789)'
  11. say '--------------------------------'
  12.  
  13. say 'Login:  ' || left(date('w'),3) || ' ' || left(date('m'),3) || ' ' || delword(date('n'),2) || time() || ' ' ||  delword(date('n'),1,2)
  14. say 'Logout: ' || left(date('w'),3) || ' ' || left(date('m'),3) || ' ' || delword(date('n'),2) || time() || ' ' ||  delword(date('n'),1,2)
  15.  
  16.